home *** CD-ROM | disk | FTP | other *** search
/ Digital Hollywood CD-ROM Demo / Digital Hollywood CD-ROM Demo.iso / HATNET CD-ROM DEMO / HATNET CD-ROM DEMO.rsrc / CODE_99_XInit.txt < prev    next >
Text File  |  1994-07-04  |  13KB  |  231 lines
  1. # near model CODE resource
  2. # jump table entries: 104-105 (2 of them)
  3. export_13:
  4. 00000000  4E56 0000                link       A6, 0
  5. 00000004  2F0C                     move.l     -[A7], A4
  6. 00000006  49ED FC80                lea.l      A4, [A5 - 0x380]
  7. 0000000A  4EBA 01D4                jsr        [PC + 0x1D4 /* 000001E0 */]
  8. 0000000E  558F                     subq.l     A7, 2
  9. 00000010  A994                     syscall    CurResFile
  10. 00000012  3B5F FD98                move.w     [A5 - 0x268], [A7]+
  11. 00000016  558F                     subq.l     A7, 2
  12. 00000018  2F0C                     move.l     -[A7], A4
  13. 0000001A  486D FD96                pea.l      [A5 - 0x26A]
  14. 0000001E  4EAD 007A                jsr        [A5 + 0x7A /* export_11 */]
  15. 00000022  4EBA 010A                jsr        [PC + 0x10A /* 0000012E */]
  16. 00000026  4EBA 01E2                jsr        [PC + 0x1E2 /* 0000020A */]
  17. 0000002A  486D 003A                pea.l      [A5 + 0x3A /* export_3 */]
  18. 0000002E  A9F1                     syscall    UnloadSeg
  19. 00000030  4EAD 003A                jsr        [A5 + 0x3A /* export_3 */]
  20. 00000034  286E FFFC                movea.l    A4, [A6 - 0x4]
  21. 00000038  4E5E                     unlink     A6
  22. 0000003A  4E75                     rts
  23. export_14:
  24. 0000003C  4E56 FFF6                link       A6, -0x000A
  25. 00000040  2F0C                     move.l     -[A7], A4
  26. 00000042  598F                     subq.l     A7, 4
  27. 00000044  7000                     moveq.l    D0, 0x00
  28. 00000046  2F00                     move.l     -[A7], D0
  29. 00000048  2F00                     move.l     -[A7], D0
  30. 0000004A  486E FFF6                pea.l      [A6 - 0xA]
  31. 0000004E  4EAD 0042                jsr        [A5 + 0x42 /* export_4 */]
  32. 00000052  2B5F FC70                move.l     [A5 - 0x390], [A7]+
  33. 00000056  4A6E FFF6                tst.w      [A6 - 0xA]
  34. 0000005A  6746                     beq        +0x48 /* 000000A2 */
  35. 0000005C  7094                     moveq.l    D0, 0xFFFFFF94
  36. 0000005E  B06E FFF6                cmp.w      D0, [A6 - 0xA]
  37. 00000062  6608                     bne        +0xA /* 0000006C */
  38. 00000064  3D7C 563D FFF6           move.w     [A6 - 0xA], 0x563D /* 'V=' */
  39. 0000006A  6016                     bra        +0x18 /* 00000082 */
  40. label0000006C:
  41. 0000006C  7046                     moveq.l    D0, 0x46
  42. 0000006E  B06E FFF6                cmp.w      D0, [A6 - 0xA]
  43. 00000072  6608                     bne        +0xA /* 0000007C */
  44. 00000074  3D7C 56F1 FFF6           move.w     [A6 - 0xA], 0x56F1
  45. 0000007A  6006                     bra        +0x8 /* 00000082 */
  46. label0000007C:
  47. 0000007C  3D7C 5A9F FFF6           move.w     [A6 - 0xA], 0x5A9F
  48. label00000082:
  49. 00000082  7001                     moveq.l    D0, 0x01
  50. 00000084  2F00                     move.l     -[A7], D0
  51. 00000086  322E FFF6                move.w     D1, [A6 - 0xA]
  52. 0000008A  48C1                     ext.l      D1
  53. 0000008C  2F01                     move.l     -[A7], D1
  54. 0000008E  4EAD 002A                jsr        [A5 + 0x2A /* export_1 */]
  55. 00000092  2F2D FC70                move.l     -[A7], [A5 - 0x390]
  56. 00000096  7000                     moveq.l    D0, 0x00
  57. 00000098  2F00                     move.l     -[A7], D0
  58. 0000009A  4EAD 004A                jsr        [A5 + 0x4A /* export_5 */]
  59. 0000009E  A9F4                     syscall    ExitToShell
  60. 000000A0  504F                     addq.w     A7, 8
  61. label000000A2:
  62. 000000A2  2F2D FC70                move.l     -[A7], [A5 - 0x390]
  63. 000000A6  700E                     moveq.l    D0, 0x0E
  64. 000000A8  3F00                     move.w     -[A7], D0
  65. 000000AA  206D FD84                movea.l    A0, [A5 - 0x27C]
  66. 000000AE  2050                     movea.l    A0, [A0]
  67. 000000B0  1F28 0005                move.b     -[A7], [A0 + 0x5]
  68. 000000B4  4EAD 006A                jsr        [A5 + 0x6A /* export_9 */]
  69. 000000B8  2F2D FC70                move.l     -[A7], [A5 - 0x390]
  70. 000000BC  7001                     moveq.l    D0, 0x01
  71. 000000BE  1F00                     move.b     -[A7], D0
  72. 000000C0  4EAD 0062                jsr        [A5 + 0x62 /* export_8 */]
  73. 000000C4  558F                     subq.l     A7, 2
  74. 000000C6  2F2D FC70                move.l     -[A7], [A5 - 0x390]
  75. 000000CA  486D FC74                pea.l      [A5 - 0x38C]
  76. 000000CE  486E FFF8                pea.l      [A6 - 0x8]
  77. 000000D2  7000                     moveq.l    D0, 0x00
  78. 000000D4  2F00                     move.l     -[A7], D0
  79. 000000D6  4EAD 0052                jsr        [A5 + 0x52 /* export_6 */]
  80. 000000DA  598F                     subq.l     A7, 4
  81. 000000DC  2F2D FC70                move.l     -[A7], [A5 - 0x390]
  82. 000000E0  7000                     moveq.l    D0, 0x00
  83. 000000E2  2F00                     move.l     -[A7], D0
  84. 000000E4  7201                     moveq.l    D1, 0x01
  85. 000000E6  2F01                     move.l     -[A7], D1
  86. 000000E8  4EAD 005A                jsr        [A5 + 0x5A /* export_7 */]
  87. 000000EC  285F                     movea.l    A4, [A7]+
  88. 000000EE  200C                     move.l     D0, A4
  89. 000000F0  56C0                     sne        D0
  90. 000000F2  0240 0001                andi.w     D0, 0x1
  91. 000000F6  48C0                     ext.l      D0
  92. 000000F8  1B40 FC78                move.b     [A5 - 0x388], D0
  93. 000000FC  422D FD94                clr.b      [A5 - 0x26C]
  94. 00000100  206D FD84                movea.l    A0, [A5 - 0x27C]
  95. 00000104  2050                     movea.l    A0, [A0]
  96. 00000106  4A28 0004                tst.b      [A0 + 0x4]
  97. 0000010A  544F                     addq.w     A7, 2
  98. 0000010C  6612                     bne        +0x14 /* 00000120 */
  99. 0000010E  206D FD84                movea.l    A0, [A5 - 0x27C]
  100. 00000112  2050                     movea.l    A0, [A0]
  101. 00000114  4A68 0006                tst.w      [A0 + 0x6]
  102. 00000118  6F06                     ble        +0x8 /* 00000120 */
  103. 0000011A  422D FC7E                clr.b      [A5 - 0x382]
  104. 0000011E  6006                     bra        +0x8 /* 00000126 */
  105. label00000120:
  106. 00000120  1B7C 0001 FC7E           move.b     [A5 - 0x382], 0x1
  107. label00000126:
  108. 00000126  286E FFF2                movea.l    A4, [A6 - 0xE]
  109. 0000012A  4E5E                     unlink     A6
  110. 0000012C  4E75                     rts
  111. fn0000012E:
  112. 0000012E  4E56 FFE4                link       A6, -0x001C
  113. 00000132  48E7 1708                movem.l    -[A7], D3,D5,D6,D7,A4
  114. 00000136  598F                     subq.l     A7, 4
  115. 00000138  2F3C 4D4D 4346           move.l     -[A7], 0x4D4D4346 /* 'MMCF' */
  116. 0000013E  3F3C 0081                move.w     -[A7], 0x81
  117. 00000142  A9A0                     syscall    GetResource
  118. 00000144  285F                     movea.l    A4, [A7]+
  119. 00000146  2054                     movea.l    A0, [A4]
  120. 00000148  43EE FFE4                lea.l      A1, [A6 - 0x1C]
  121. 0000014C  7005                     moveq.l    D0, 0x05
  122. label0000014E:
  123. 0000014E  22D8                     move.l     [A1]+, [A0]+
  124. 00000150  51C8 FFFC                dbf        D0, -0x6 /* 0000014E */
  125. 00000154  2F0C                     move.l     -[A7], A4
  126. 00000156  A9A3                     syscall    ReleaseResource
  127. 00000158  7600                     moveq.l    D3, 0x00
  128. 0000015A  2F03                     move.l     -[A7], D3
  129. 0000015C  558F                     subq.l     A7, 2
  130. 0000015E  2F3C 7164 2020           move.l     -[A7], 0x71642020 /* 'qd  ' */
  131. 00000164  486E FFFC                pea.l      [A6 - 0x4]
  132. 00000168  4EAD 0082                jsr        [A5 + 0x82 /* export_12 */]
  133. 0000016C  301F                     move.w     D0, [A7]+
  134. 0000016E  261F                     move.l     D3, [A7]+
  135. 00000170  4A40                     tst.w      D0
  136. 00000172  660C                     bne        +0xE /* 00000180 */
  137. 00000174  0CAE 0000 0100 FFFC      cmpi.l     [A6 - 0x4], 0x100
  138. 0000017C  6D02                     blt        +0x4 /* 00000180 */
  139. 0000017E  7601                     moveq.l    D3, 0x01
  140. label00000180:
  141. 00000180  1B43 FC78                move.b     [A5 - 0x388], D3
  142. 00000184  670A                     beq        +0xC /* 00000190 */
  143. 00000186  2E2E FFE8                move.l     D7, [A6 - 0x18]
  144. 0000018A  2C2E FFF0                move.l     D6, [A6 - 0x10]
  145. 0000018E  6008                     bra        +0xA /* 00000198 */
  146. label00000190:
  147. 00000190  2E2E FFE4                move.l     D7, [A6 - 0x1C]
  148. 00000194  2C2E FFEC                move.l     D6, [A6 - 0x14]
  149. label00000198:
  150. 00000198  200F                     move.l     D0, A7
  151. 0000019A  2A00                     move.l     D5, D0
  152. 0000019C  9A87                     sub.l      D5, D7
  153. 0000019E  2045                     movea.l    A0, D5
  154. 000001A0  A02D                     syscall    SetApplLimit
  155. 000001A2  A063                     syscall    MaxApplZone
  156. 000001A4  4247                     clr.w      D7
  157. 000001A6  6006                     bra        +0x8 /* 000001AE */
  158. label000001A8:
  159. 000001A8  A036                     syscall    MoreMasters
  160. 000001AA  3007                     move.w     D0, D7
  161. 000001AC  5247                     addq.w     D7, 1
  162. label000001AE:
  163. 000001AE  48C7                     ext.l      D7
  164. 000001B0  BC87                     cmp.l      D6, D7
  165. 000001B2  6EF4                     bgt        -0xA /* 000001A8 */
  166. 000001B4  2038 0130                move.l     D0, [0x00000130 /* ApplLimit */]
  167. 000001B8  90B8 02AA                sub.l      D0, [0x000002AA /* ApplZone */]
  168. 000001BC  90AE FFF8                sub.l      D0, [A6 - 0x8]
  169. 000001C0  B0AE FFF4                cmp.l      D0, [A6 - 0xC]
  170. 000001C4  6C10                     bge        +0x12 /* 000001D6 */
  171. 000001C6  7001                     moveq.l    D0, 0x01
  172. 000001C8  2F00                     move.l     -[A7], D0
  173. 000001CA  4878 563D                push.l     0x563D /* 'V=' */
  174. 000001CE  4EAD 002A                jsr        [A5 + 0x2A /* export_1 */]
  175. 000001D2  A9F4                     syscall    ExitToShell
  176. 000001D4  504F                     addq.w     A7, 8
  177. label000001D6:
  178. 000001D6  4CEE 10E8 FFD0           movem.l    D3,D5,D6,D7,A4, [A6 - 0x30]
  179. 000001DC  4E5E                     unlink     A6
  180. 000001DE  4E75                     rts
  181. fn000001E0:
  182. 000001E0  4E56 0000                link       A6, 0
  183. 000001E4  486D FE7E                pea.l      [A5 - 0x182]
  184. 000001E8  A86E                     syscall    InitGraf
  185. 000001EA  A8FE                     syscall    InitFonts
  186. 000001EC  70FF                     moveq.l    D0, 0xFFFFFFFF
  187. 000001EE  3F00                     move.w     -[A7], D0
  188. 000001F0  7200                     moveq.l    D1, 0x00
  189. 000001F2  3F01                     move.w     -[A7], D1
  190. 000001F4  201F                     move.l     D0, [A7]+
  191. 000001F6  A032                     syscall    FlushEvents
  192. 000001F8  A912                     syscall    InitWindows
  193. 000001FA  A930                     syscall    InitMenus
  194. 000001FC  A9CC                     syscall    TEInit
  195. 000001FE  7000                     moveq.l    D0, 0x00
  196. 00000200  2F00                     move.l     -[A7], D0
  197. 00000202  A97B                     syscall    InitDialogs
  198. 00000204  A850                     syscall    InitCursor
  199. 00000206  4E5E                     unlink     A6
  200. 00000208  4E75                     rts
  201. fn0000020A:
  202. 0000020A  4E56 0000                link       A6, 0
  203. 0000020E  2F0C                     move.l     -[A7], A4
  204. 00000210  598F                     subq.l     A7, 4
  205. 00000212  2F3C 5657 7374           move.l     -[A7], 0x56577374 /* 'VWst' */
  206. 00000218  7000                     moveq.l    D0, 0x00
  207. 0000021A  3F00                     move.w     -[A7], D0
  208. 0000021C  A9A0                     syscall    GetResource
  209. 0000021E  2B5F FD84                move.l     [A5 - 0x27C], [A7]+
  210. 00000222  6708                     beq        +0xA /* 0000022C */
  211. 00000224  2F2D FD84                move.l     -[A7], [A5 - 0x27C]
  212. 00000228  A992                     syscall    DetachResource
  213. 0000022A  602C                     bra        +0x2E /* 00000258 */
  214. label0000022C:
  215. 0000022C  700C                     moveq.l    D0, 0x0C
  216. 0000022E  A122                     syscall    NewHandle, flags=1
  217. 00000230  2B48 FD84                move.l     [A5 - 0x27C], A0
  218. 00000234  2850                     movea.l    A4, [A0]
  219. 00000236  4214                     clr.b      [A4]
  220. 00000238  426C 0002                clr.w      [A4 + 0x2]
  221. 0000023C  426C 0004                clr.w      [A4 + 0x4]
  222. 00000240  197C 0001 0001           move.b     [A4 + 0x1], 0x1
  223. 00000246  426C 0006                clr.w      [A4 + 0x6]
  224. 0000024A  426C 0008                clr.w      [A4 + 0x8]
  225. 0000024E  197C 0003 000A           move.b     [A4 + 0xA], 0x3
  226. 00000254  422C 000B                clr.b      [A4 + 0xB]
  227. label00000258:
  228. 00000258  286E FFFC                movea.l    A4, [A6 - 0x4]
  229. 0000025C  4E5E                     unlink     A6
  230. 0000025E  4E75                     rts
  231.